home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 2003 June / macformat-130.iso / mac / Reviewed⁄Demos / Spearhead Demo / demota / pak1.pk3 / global / dm_ai.scr < prev    next >
Encoding:
Text File  |  2002-10-21  |  1.2 KB  |  56 lines
  1. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  3. //
  4. // global/dm_ai.scr
  5. //
  6. // author: Michael Goodwin
  7. //
  8. // description:
  9. //
  10. // - pseudo ai.scr for scripted DM cinematics
  11. //
  12. // setup:
  13. //
  14. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  15. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  16. main:
  17.  
  18.     if ( $enemyspawner )
  19.     {
  20.         for ( local.i = 1; local.i <= $enemyspawner.size; local.i++ )
  21.         {
  22.             $enemyspawner[local.i] hide
  23.             $enemyspawner[local.i] notsolid
  24.             $enemyspawner[local.i] ai_off
  25.         }
  26.     }
  27.  
  28. end
  29.  
  30.  
  31. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  32. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  33. // "spawn" all spawners with matching set #
  34. //   ai is disabled automatically
  35. //
  36. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  37. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  38. spawnset local.set local.name:
  39.  
  40.     if ( $enemyspawner && (local.set != NIL) )
  41.     {    
  42.         for ( local.i = $enemyspawner.size; local.i >= 1; local.i-- )
  43.         {
  44.             if ( $enemyspawner[local.i].set == local.set )
  45.             {                    
  46.                 $enemyspawner[local.i] show
  47.                 $enemyspawner[local.i] solid
  48.                 $enemyspawner[local.i] ai_on
  49.                 $enemyspawner[local.i] exec global/disable_ai.scr
  50.                 if ( local.name != NIL )
  51.                     $enemyspawner[local.i].targetname = local.name
  52.             }
  53.         }
  54.     }
  55.  
  56. end